home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
MacHack 1996
/
MacHack 1996.toast
/
Presentations
/
Presentations ’94
/
Timothy Knox
/
Help
/
Help Files
/
Constraints
/
Full
< prev
next >
Wrap
Text File
|
1994-06-24
|
706b
|
30 lines
{ DEUX+DEUX+DEUX+NEUF+NEUF=FULL }
(c)
;;; Variables
(r0 f x l r1 u r2 e n d)
;;; Constraints
((=? (+ (* 3 x)(+ f f)) (+ l (* 10 r0)))
(=? (+ (* 5 u) r0) (+ l (* 10 r1)))
(=? (+ (* 5 e) r1) (+ u (* 10 r2)))
(=? (+ (* 3 d) (+ (+ n n) r2)) f)
(<>? f u) (<>? f l) (<>? f x) (<>? f e)
(<>? f n) (<>? f d) (<>? u l) (<>? u x)
(<>? u e) (<>? u n) (<>? u d) (<>? l x)
(<>? l e) (<>? l n) (<>? l d) (<>? x e)
(<>? x n) (<>? x d) (<>? e n) (<>? e d)
(<>? n d) (<>? d 0) (<>? n 0) (<>? f 0))
;;; Domains
((0 1 2 3 4)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9))